home *** CD-ROM | disk | FTP | other *** search
/ Programmer Plus 2007 / Programmer-Plus-2007.iso / Programming / Borland Plateform / Turbo Prolog 2 / EXAMPL64.PRO < prev    next >
Encoding:
Text File  |  1986-04-25  |  257 b   |  11 lines
  1.       /* program 64 */
  2.  
  3.   /* read the read64.me to link language modules*/
  4.  
  5. global predicates
  6.    treble(integer,integer) - (i,o) language c
  7. goal
  8.    write("Type an integer "),
  9.    readint(A),
  10.    treble(A,T),
  11.    write("Treble that number is ",T),nl.